home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…tion Library 2 (Reseller) / Apple R&P Lib Reseller v2.0.iso / 3-Demos / Tutorials / Macintosh SE⁄30 Training / Apple Macintosh SE⁄30 / Apple Macintosh SE_30 / card_121295.txt < prev    next >
Text File  |  1989-08-22  |  4KB  |  194 lines
  1. -- card: 121295 from stack: in
  2. -- bmap block id: 121388
  3. -- flags: 0000
  4. -- background id: 121031
  5. -- name: certificate1
  6. ----- HyperTalk script -----
  7. on mouseUp
  8.   answer"Click the Return button to go back."
  9. end mouseUp
  10.  
  11.  
  12.  
  13. -- part 1 (field)
  14. -- low flags: 01
  15. -- high flags: 0000
  16. -- rect: left=128 top=0 right=22 bottom=508
  17. -- title width / last selected line: 0
  18. -- icon id / first selected line: 0 / 0
  19. -- text alignment: 0
  20. -- font id: 21
  21. -- text size: 18
  22. -- style flags: 10240
  23. -- line height: 19
  24. -- part name: Title
  25.  
  26.  
  27. -- part 2 (field)
  28. -- low flags: 01
  29. -- high flags: 0000
  30. -- rect: left=128 top=23 right=45 bottom=508
  31. -- title width / last selected line: 0
  32. -- icon id / first selected line: 0 / 0
  33. -- text alignment: 0
  34. -- font id: 21
  35. -- text size: 18
  36. -- style flags: 0
  37. -- line height: 20
  38. -- part name: cardTitle
  39.  
  40.  
  41. -- part 3 (field)
  42. -- low flags: 01
  43. -- high flags: 0000
  44. -- rect: left=128 top=70 right=313 bottom=509
  45. -- title width / last selected line: 0
  46. -- icon id / first selected line: 0 / 0
  47. -- text alignment: 0
  48. -- font id: 2
  49. -- text size: 12
  50. -- style flags: 0
  51. -- line height: 16
  52. -- part name: cardText
  53.  
  54.  
  55. -- part 5 (button)
  56. -- low flags: 00
  57. -- high flags: 2000
  58. -- rect: left=482 top=317 right=342 bottom=510
  59. -- title width / last selected line: 0
  60. -- icon id / first selected line: 18613 / 18613
  61. -- text alignment: 1
  62. -- font id: 0
  63. -- text size: 12
  64. -- style flags: 0
  65. -- line height: 16
  66. -- part name: return
  67. ----- HyperTalk script -----
  68. on mouseUp
  69.   pop card into lastPush
  70.   if the short name of this stack is not in lastPush then
  71.     visual dissolve
  72.     go card "Map"
  73.   else
  74.     visual dissolve
  75.     go lastPush
  76.   end if
  77. end mouseUp
  78.  
  79.  
  80.  
  81. -- part 6 (field)
  82. -- low flags: 01
  83. -- high flags: 0000
  84. -- rect: left=128 top=134 right=154 bottom=509
  85. -- title width / last selected line: 0
  86. -- icon id / first selected line: 0 / 0
  87. -- text alignment: 0
  88. -- font id: 157
  89. -- text size: 14
  90. -- style flags: 0
  91. -- line height: 16
  92. -- part name: directions
  93.  
  94.  
  95. -- part 7 (button)
  96. -- low flags: 00
  97. -- high flags: A004
  98. -- rect: left=17 top=138 right=159 bottom=116
  99. -- title width / last selected line: 0
  100. -- icon id / first selected line: 0 / 0
  101. -- text alignment: 1
  102. -- font id: 3
  103. -- text size: 9
  104. -- style flags: 0
  105. -- line height: 12
  106. -- part name: Print Certificate…
  107. ----- HyperTalk script -----
  108. on mouseUp
  109.   ask "What is your name?"
  110.   if it is "Cancel" then exit mouseUp
  111.   if it is empty then exit mouseUp
  112.   put it into whoAmI
  113.  
  114.   push card
  115.   open printing with dialog
  116.  
  117.   go card "certificate2"
  118.   print card
  119.  
  120.   go card "certificate3"
  121.   put whoAmI into card field "myName"
  122.   put the long date into card field "theDate"
  123.   print card
  124.  
  125.   close printing
  126.   put "Macintosh User" into card field "myName"
  127.   pop card
  128. end mouseUp
  129.  
  130.  
  131.  
  132. -- part 8 (field)
  133. -- low flags: 01
  134. -- high flags: 0000
  135. -- rect: left=128 top=278 right=297 bottom=417
  136. -- title width / last selected line: 0
  137. -- icon id / first selected line: 0 / 0
  138. -- text alignment: 0
  139. -- font id: 157
  140. -- text size: 14
  141. -- style flags: 0
  142. -- line height: 16
  143. -- part name: directions
  144.  
  145.  
  146. -- part 9 (field)
  147. -- low flags: 01
  148. -- high flags: 0000
  149. -- rect: left=128 top=70 right=121 bottom=508
  150. -- title width / last selected line: 0
  151. -- icon id / first selected line: 0 / 0
  152. -- text alignment: 0
  153. -- font id: 158
  154. -- text size: 14
  155. -- style flags: 0
  156. -- line height: 16
  157. -- part name: directions
  158.  
  159.  
  160. -- part contents for card part 1
  161. ----- text -----
  162. Apple Macintosh SE/30
  163.  
  164. -- part contents for card part 2
  165. ----- text -----
  166. Certificate of Completion
  167.  
  168. -- part contents for card part 6
  169. ----- text -----
  170. Read the instructions then click the Print Certificate button.
  171.  
  172. -- part contents for card part 3
  173. ----- text -----
  174.  
  175.  
  176.  
  177.  
  178.  
  179.  
  180. ‚Ä¢ When you click the Print Certificate button you will be 
  181.    asked for your name 
  182. ‚Ä¢ Then a print dialog box will open 
  183. ‚Ä¢ Select ‚ÄúPrint full size cards‚Äù and ‚ÄúSplit-page format‚Äù
  184.    in the dialog box
  185. ‚Ä¢ Click the OK button
  186.  
  187. -- part contents for card part 8
  188. ----- text -----
  189. Click the Return arrow to return to the stack.
  190.  
  191. -- part contents for card part 9
  192. ----- text -----
  193. Congratulations! You have completed this stack. 
  194. You have the option of printing a Certificate of Completion, or you can return to where you were.